/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Prog / A / Add images.sit / pix_io.c

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 70 69 78 5f 69 6f | 2e 63 00 00 00 00 00 00 |..pix_io|.c......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 00 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 25 8c 00 | 00 01 60 a0 c7 19 86 a0 |.....%..|..`.....|
|00000060| c7 19 86 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 a3 c5 00 00 |........|........|
|00000080| 2f 2a 0d 09 70 69 78 5f | 69 6f 2e 63 0d 0d 09 66 |/*..pix_|io.c...f|
|00000090| 69 6c 65 20 69 6e 70 75 | 74 20 61 6e 64 20 6f 75 |ile inpu|t and ou|
|000000a0| 74 70 75 74 20 6f 66 20 | 50 49 43 54 73 20 61 6e |tput of |PICTs an|
|000000b0| 64 20 63 75 74 20 61 6e | 64 20 70 61 73 74 65 20 |d cut an|d paste |
|000000c0| 77 69 74 68 20 43 4c 49 | 50 42 4f 41 52 44 0d 09 |with CLI|PBOARD..|
|000000d0| 61 6e 64 20 6d 6f 73 74 | 20 69 6d 70 6f 72 74 61 |and most| importa|
|000000e0| 6e 74 20 2d 20 63 6f 6e | 76 65 72 73 69 6f 6e 20 |nt - con|version |
|000000f0| 66 72 6f 6d 20 73 74 64 | 20 70 69 63 74 73 20 74 |from std| picts t|
|00000100| 6f 20 74 68 65 20 70 72 | 6f 70 65 72 20 63 6f 6c |o the pr|oper col|
|00000110| 6f 72 73 0d 09 66 6f 72 | 20 50 52 4f 54 4f 4e 2c |ors..for| PROTON,|
|00000120| 20 46 4c 4f 55 52 49 4e | 45 2c 20 61 6e 64 20 74 | FLOURIN|E, and t|
|00000130| 68 65 20 6d 69 78 74 75 | 72 65 20 6f 66 20 74 68 |he mixtu|re of th|
|00000140| 65 20 74 77 6f 0d 0d 2a | 2f 0d 0d 23 69 6e 63 6c |e two..*|/..#incl|
|00000150| 75 64 65 20 22 70 69 78 | 5f 69 6f 2e 68 22 0d 23 |ude "pix|_io.h".#|
|00000160| 69 6e 63 6c 75 64 65 20 | 22 61 62 6f 75 74 5f 61 |include |"about_a|
|00000170| 6c 65 72 74 2e 68 22 0d | 23 69 6e 63 6c 75 64 65 |lert.h".|#include|
|00000180| 20 3c 49 4d 31 5f 35 50 | 72 6f 74 6f 73 2e 68 3e | <IM1_5P|rotos.h>|
|00000190| 0d 0d 65 78 74 65 72 6e | 20 73 68 6f 72 74 20 61 |..extern| short a|
|000001a0| 64 64 5f 6d 6f 64 65 3b | 0d 0d 23 64 65 66 69 6e |dd_mode;|..#defin|
|000001b0| 65 20 20 20 20 20 20 54 | 52 55 45 20 20 20 31 0d |e      T|RUE   1.|
|000001c0| 23 64 65 66 69 6e 65 20 | 20 20 20 20 20 46 41 4c |#define |     FAL|
|000001d0| 53 45 20 20 30 0d 23 64 | 65 66 69 6e 65 20 20 20 |SE  0.#d|efine   |
|000001e0| 20 20 20 4e 49 4c 20 20 | 20 20 30 0d 0d 2f 2a 20 |   NIL  |  0../* |
|000001f0| 63 6f 6e 76 65 72 73 69 | 6f 6e 20 74 6f 20 74 68 |conversi|on to th|
|00000200| 65 20 70 72 6f 70 65 72 | 20 70 69 78 6d 61 70 20 |e proper| pixmap |
|00000210| 63 6f 75 6c 64 20 62 65 | 20 74 72 69 63 6b 79 20 |could be| tricky |
|00000220| 2a 2f 0d 0d 73 68 6f 72 | 74 20 73 68 6f 72 74 5f |*/..shor|t short_|
|00000230| 6d 61 78 28 20 73 68 6f | 72 74 20 61 2c 20 73 68 |max( sho|rt a, sh|
|00000240| 6f 72 74 20 62 20 29 3b | 0d 73 68 6f 72 74 20 73 |ort b );|.short s|
|00000250| 68 6f 72 74 5f 6d 69 6e | 28 20 73 68 6f 72 74 20 |hort_min|( short |
|00000260| 61 2c 20 73 68 6f 72 74 | 20 62 20 29 3b 0d 0d 73 |a, short| b );..s|
|00000270| 68 6f 72 74 20 73 68 6f | 72 74 5f 6d 61 78 28 20 |hort sho|rt_max( |
|00000280| 61 2c 20 62 20 29 0d 09 | 73 68 6f 72 74 20 61 3b |a, b )..|short a;|
|00000290| 0d 09 73 68 6f 72 74 20 | 62 3b 0d 7b 0d 09 69 66 |..short |b;.{..if|
|000002a0| 20 28 20 61 20 3e 20 62 | 20 29 0d 09 09 72 65 74 | ( a > b| )...ret|
|000002b0| 75 72 6e 28 20 61 20 29 | 3b 0d 09 65 6c 73 65 0d |urn( a )|;..else.|
|000002c0| 09 09 72 65 74 75 72 6e | 28 20 62 20 29 3b 0d 7d |..return|( b );.}|
|000002d0| 0d 0d 73 68 6f 72 74 20 | 73 68 6f 72 74 5f 6d 69 |..short |short_mi|
|000002e0| 6e 28 20 61 2c 20 62 20 | 29 0d 09 73 68 6f 72 74 |n( a, b |)..short|
|000002f0| 20 61 3b 0d 09 73 68 6f | 72 74 20 62 3b 0d 7b 0d | a;..sho|rt b;.{.|
|00000300| 09 69 66 20 28 20 61 20 | 3c 20 62 20 29 0d 09 09 |.if ( a |< b )...|
|00000310| 72 65 74 75 72 6e 28 20 | 61 20 29 3b 0d 09 65 6c |return( |a );..el|
|00000320| 73 65 0d 09 09 72 65 74 | 75 72 6e 28 20 62 20 29 |se...ret|urn( b )|
|00000330| 3b 0d 7d 0d 0d 73 68 6f | 72 74 20 47 65 74 50 69 |;.}..sho|rt GetPi|
|00000340| 63 28 20 74 68 65 52 65 | 70 6c 79 2c 20 73 6f 75 |c( theRe|ply, sou|
|00000350| 72 63 65 5f 70 69 63 20 | 29 0d 09 53 46 52 65 70 |rce_pic |)..SFRep|
|00000360| 6c 79 20 74 68 65 52 65 | 70 6c 79 3b 0d 09 50 69 |ly theRe|ply;..Pi|
|00000370| 63 48 61 6e 64 6c 65 20 | 2a 73 6f 75 72 63 65 5f |cHandle |*source_|
|00000380| 70 69 63 3b 0d 2f 2a 0d | 09 72 65 61 64 73 20 50 |pic;./*.|.reads P|
|00000390| 49 43 54 20 66 69 6c 65 | 20 61 6e 64 20 73 74 6f |ICT file| and sto|
|000003a0| 72 65 73 20 69 6e 20 74 | 68 65 0d 09 74 68 65 20 |res in t|he..the |
|000003b0| 70 69 63 20 68 61 6e 64 | 6c 65 2e 20 63 61 6c 6c |pic hand|le. call|
|000003c0| 65 64 20 62 79 20 72 65 | 61 64 5f 70 72 6f 74 6f |ed by re|ad_proto|
|000003d0| 6e 0d 09 61 6e 64 20 72 | 65 61 64 5f 66 6c 6f 75 |n..and r|ead_flou|
|000003e0| 72 69 6e 65 2e 0d 2a 2f | 0d 7b 0d 09 53 46 54 79 |rine..*/|.{..SFTy|
|000003f0| 70 65 4c 69 73 74 20 74 | 68 65 4c 69 73 74 3b 0d |peList t|heList;.|
|00000400| 09 50 6f 69 6e 74 20 70 | 3b 0d 09 73 68 6f 72 74 |.Point p|;..short|
|00000410| 20 65 72 72 2c 20 46 69 | 6c 65 52 65 66 3b 0d 09 | err, Fi|leRef;..|
|00000420| 6c 6f 6e 67 20 42 75 66 | 53 69 7a 65 3b 0d 09 50 |long Buf|Size;..P|
|00000430| 69 63 48 61 6e 64 6c 65 | 20 74 65 6d 70 50 69 63 |icHandle| tempPic|
|00000440| 3b 0d 0d 09 2f 2a 20 66 | 69 72 73 74 2c 20 6f 70 |;.../* f|irst, op|
|00000450| 65 6e 20 50 49 43 54 20 | 66 69 6c 65 20 2a 2f 0d |en PICT |file */.|
|00000460| 09 46 69 6c 65 52 65 66 | 20 3d 20 30 3b 0d 0d 09 |.FileRef| = 0;...|
|00000470| 53 65 74 56 6f 6c 28 4e | 49 4c 2c 20 74 68 65 52 |SetVol(N|IL, theR|
|00000480| 65 70 6c 79 2e 76 52 65 | 66 4e 75 6d 29 3b 0d 09 |eply.vRe|fNum);..|
|00000490| 65 72 72 20 3d 20 46 53 | 4f 70 65 6e 28 20 28 53 |err = FS|Open( (S|
|000004a0| 74 72 32 35 35 20 2a 29 | 26 74 68 65 52 65 70 6c |tr255 *)|&theRepl|
|000004b0| 79 2e 66 4e 61 6d 65 2c | 20 74 68 65 52 65 70 6c |y.fName,| theRepl|
|000004c0| 79 2e 76 52 65 66 4e 75 | 6d 2c 20 26 46 69 6c 65 |y.vRefNu|m, &File|
|000004d0| 52 65 66 29 3b 0d 0d 09 | 69 66 20 28 20 65 72 72 |Ref);...|if ( err|
|000004e0| 20 3d 3d 20 6e 6f 45 72 | 72 20 29 0d 09 7b 0d 09 | == noEr|r )..{..|
|000004f0| 09 65 72 72 20 3d 20 47 | 65 74 45 4f 46 28 46 69 |.err = G|etEOF(Fi|
|00000500| 6c 65 52 65 66 2c 20 26 | 42 75 66 53 69 7a 65 29 |leRef, &|BufSize)|
|00000510| 3b 0d 0d 09 09 69 66 20 | 28 65 72 72 20 3d 3d 20 |;....if |(err == |
|00000520| 6e 6f 45 72 72 29 0d 09 | 09 7b 0d 09 09 09 2f 2a |noErr)..|.{..../*|
|00000530| 20 73 69 7a 65 20 6f 66 | 20 74 68 65 20 66 69 6c | size of| the fil|
|00000540| 65 20 69 6e 63 6c 75 64 | 65 73 20 61 20 35 31 32 |e includ|es a 512|
|00000550| 2d 62 79 74 65 20 68 65 | 61 64 65 72 20 2a 2f 0d |-byte he|ader */.|
|00000560| 09 09 09 42 75 66 53 69 | 7a 65 20 2d 3d 20 35 31 |...BufSi|ze -= 51|
|00000570| 32 3b 0d 09 09 09 65 72 | 72 20 3d 20 53 65 74 46 |2;....er|r = SetF|
|00000580| 50 6f 73 28 46 69 6c 65 | 52 65 66 2c 20 66 73 46 |Pos(File|Ref, fsF|
|00000590| 72 6f 6d 53 74 61 72 74 | 2c 20 35 31 32 29 3b 0d |romStart|, 512);.|
|000005a0| 0d 09 09 09 69 66 20 28 | 20 65 72 72 20 3d 3d 20 |....if (| err == |
|000005b0| 6e 6f 45 72 72 20 29 0d | 09 09 09 7b 0d 09 09 09 |noErr ).|...{....|
|000005c0| 09 74 65 6d 70 50 69 63 | 20 3d 20 28 50 69 63 48 |.tempPic| = (PicH|
|000005d0| 61 6e 64 6c 65 29 4e 65 | 77 48 61 6e 64 6c 65 28 |andle)Ne|wHandle(|
|000005e0| 42 75 66 53 69 7a 65 29 | 3b 0d 09 09 09 09 65 72 |BufSize)|;.....er|
|000005f0| 72 20 3d 20 4d 65 6d 45 | 72 72 3b 0d 0d 09 09 09 |r = MemE|rr;.....|
|00000600| 09 69 66 20 28 20 65 72 | 72 20 3d 3d 20 6e 6f 45 |.if ( er|r == noE|
|00000610| 72 72 20 29 0d 09 09 09 | 09 7b 0d 09 09 09 09 09 |rr )....|.{......|
|00000620| 2f 2a 20 72 65 61 64 20 | 74 68 65 20 66 69 6c 65 |/* read |the file|
|00000630| 20 28 65 78 63 65 70 74 | 20 74 68 65 20 68 65 61 | (except| the hea|
|00000640| 64 65 72 29 20 69 6e 74 | 6f 20 74 68 65 20 70 69 |der) int|o the pi|
|00000650| 63 2d 68 61 6e 64 6c 65 | 20 2a 2f 0d 09 09 09 09 |c-handle| */.....|
|00000660| 09 48 4c 6f 63 6b 28 20 | 28 48 61 6e 64 6c 65 29 |.HLock( |(Handle)|
|00000670| 74 65 6d 70 50 69 63 29 | 3b 0d 09 09 09 09 09 65 |tempPic)|;......e|
|00000680| 72 72 20 3d 20 46 53 52 | 65 61 64 28 20 46 69 6c |rr = FSR|ead( Fil|
|00000690| 65 52 65 66 2c 20 26 42 | 75 66 53 69 7a 65 2c 20 |eRef, &B|ufSize, |
|000006a0| 2a 74 65 6d 70 50 69 63 | 20 29 3b 0d 09 09 09 09 |*tempPic| );.....|
|000006b0| 09 48 55 6e 6c 6f 63 6b | 28 20 28 48 61 6e 64 6c |.HUnlock|( (Handl|
|000006c0| 65 29 74 65 6d 70 50 69 | 63 29 3b 0d 09 09 09 09 |e)tempPi|c);.....|
|000006d0| 09 69 66 20 28 20 65 72 | 72 20 3d 3d 20 6e 6f 45 |.if ( er|r == noE|
|000006e0| 72 72 20 29 0d 09 09 09 | 09 09 7b 0d 09 09 09 09 |rr )....|..{.....|
|000006f0| 09 09 2a 73 6f 75 72 63 | 65 5f 70 69 63 20 3d 20 |..*sourc|e_pic = |
|00000700| 74 65 6d 70 50 69 63 3b | 0d 09 09 09 09 09 09 46 |tempPic;|.......F|
|00000710| 69 6c 65 52 65 66 20 3d | 20 46 53 43 6c 6f 73 65 |ileRef =| FSClose|
|00000720| 28 46 69 6c 65 52 65 66 | 29 3b 0d 09 09 09 09 09 |(FileRef|);......|
|00000730| 09 72 65 74 75 72 6e 28 | 20 54 52 55 45 20 29 3b |.return(| TRUE );|
|00000740| 0d 09 09 09 09 09 7d 0d | 09 09 09 09 7d 0d 09 09 |......}.|....}...|
|00000750| 09 7d 0d 09 09 7d 0d 09 | 7d 0d 09 2f 2a 20 69 66 |.}...}..|}../* if|
|00000760| 20 77 65 20 72 65 61 63 | 68 20 68 65 72 65 2c 20 | we reac|h here, |
|00000770| 74 68 65 6e 20 77 65 20 | 64 69 64 6e 27 74 20 73 |then we |didn't s|
|00000780| 75 63 63 65 73 73 66 75 | 6c 6c 79 20 72 65 61 64 |uccessfu|lly read|
|00000790| 20 69 6e 20 74 68 65 20 | 69 6d 61 67 65 20 2a 2f | in the |image */|
|000007a0| 0d 09 69 66 20 28 46 69 | 6c 65 52 65 66 20 21 3d |..if (Fi|leRef !=|
|000007b0| 20 30 29 0d 09 7b 0d 09 | 09 46 69 6c 65 52 65 66 | 0)..{..|.FileRef|
|000007c0| 20 3d 20 46 53 43 6c 6f | 73 65 28 46 69 6c 65 52 | = FSClo|se(FileR|
|000007d0| 65 66 29 3b 0d 09 7d 0d | 0d 09 44 5f 65 72 72 6f |ef);..}.|..D_erro|
|000007e0| 72 5f 61 6c 65 72 74 28 | 20 28 6c 6f 6e 67 29 20 |r_alert(| (long) |
|000007f0| 65 72 72 20 29 3b 0d 09 | 69 66 20 28 74 65 6d 70 |err );..|if (temp|
|00000800| 50 69 63 20 21 3d 20 4e | 49 4c 29 0d 09 7b 0d 09 |Pic != N|IL)..{..|
|00000810| 09 44 69 73 70 6f 73 48 | 61 6e 64 6c 65 28 20 28 |.DisposH|andle( (|
|00000820| 48 61 6e 64 6c 65 29 20 | 74 65 6d 70 50 69 63 20 |Handle) |tempPic |
|00000830| 29 3b 0d 09 7d 0d 09 72 | 65 74 75 72 6e 28 20 46 |);..}..r|eturn( F|
|00000840| 41 4c 53 45 20 29 3b 0d | 7d 0d 0d 76 6f 69 64 20 |ALSE );.|}..void |
|00000850| 50 75 74 50 69 63 28 20 | 74 68 65 52 65 70 6c 79 |PutPic( |theReply|
|00000860| 2c 20 72 65 73 75 6c 74 | 5f 70 69 63 2c 20 74 68 |, result|_pic, th|
|00000870| 65 50 61 6c 65 74 74 65 | 20 29 0d 2f 2a 20 77 72 |ePalette| )./* wr|
|00000880| 69 74 65 20 74 68 65 20 | 50 69 78 65 6c 20 69 6d |ite the |Pixel im|
|00000890| 61 67 65 20 69 6e 74 6f | 20 61 20 50 49 43 54 20 |age into| a PICT |
|000008a0| 66 69 6c 65 20 74 68 61 | 74 20 75 73 65 73 20 74 |file tha|t uses t|
|000008b0| 68 65 50 61 6c 65 74 74 | 65 20 2a 2f 0d 09 53 46 |hePalett|e */..SF|
|000008c0| 52 65 70 6c 79 20 74 68 | 65 52 65 70 6c 79 3b 0d |Reply th|eReply;.|
|000008d0| 09 50 69 63 48 61 6e 64 | 6c 65 20 72 65 73 75 6c |.PicHand|le resul|
|000008e0| 74 5f 70 69 63 3b 0d 09 | 50 61 6c 65 74 74 65 48 |t_pic;..|PaletteH|
|000008f0| 61 6e 64 6c 65 20 74 68 | 65 50 61 6c 65 74 74 65 |andle th|ePalette|
|00000900| 3b 0d 7b 0d 0d 7d 0d 0d | 74 79 70 65 64 65 66 20 |;.{..}..|typedef |
|00000910| 75 6e 73 69 67 6e 65 64 | 20 63 68 61 72 20 2a 42 |unsigned| char *B|
|00000920| 79 74 65 50 74 72 3b 0d | 0d 43 47 72 61 66 50 74 |ytePtr;.|.CGrafPt|
|00000930| 72 20 70 69 63 5f 74 6f | 5f 62 6d 61 70 28 20 70 |r pic_to|_bmap( p|
|00000940| 69 63 48 2c 20 66 72 61 | 6d 65 2c 20 74 68 65 6d |icH, fra|me, them|
|00000950| 61 78 64 65 76 69 63 65 | 20 29 0d 2f 2a 20 63 72 |axdevice| )./* cr|
|00000960| 65 61 74 65 20 6f 66 66 | 2d 73 63 72 65 65 6e 20 |eate off|-screen |
|00000970| 70 69 78 6d 61 70 20 61 | 6e 64 20 64 72 61 77 20 |pixmap a|nd draw |
|00000980| 70 69 63 74 75 72 65 20 | 69 6e 74 6f 20 69 74 20 |picture |into it |
|00000990| 2a 2f 0d 09 50 69 63 48 | 61 6e 64 6c 65 20 70 69 |*/..PicH|andle pi|
|000009a0| 63 48 3b 0d 09 52 65 63 | 74 20 2a 66 72 61 6d 65 |cH;..Rec|t *frame|
|000009b0| 3b 0d 09 47 44 48 61 6e | 64 6c 65 20 74 68 65 6d |;..GDHan|dle them|
|000009c0| 61 78 64 65 76 69 63 65 | 3b 0d 7b 0d 09 43 47 72 |axdevice|;.{..CGr|
|000009d0| 61 66 50 74 72 20 6f 66 | 66 5f 70 6f 72 74 3b 0d |afPtr of|f_port;.|
|000009e0| 09 47 44 48 61 6e 64 6c | 65 20 6f 6c 64 64 65 76 |.GDHandl|e olddev|
|000009f0| 69 63 65 3b 0d 09 47 72 | 61 66 50 74 72 20 73 61 |ice;..Gr|afPtr sa|
|00000a00| 76 65 70 6f 72 74 3b 0d | 09 6c 6f 6e 67 20 73 69 |veport;.|.long si|
|00000a10| 7a 65 2c 20 6f 66 66 72 | 6f 77 62 79 74 65 73 3b |ze, offr|owbytes;|
|00000a20| 0d 09 50 74 72 20 69 6d | 61 67 65 5f 73 70 61 63 |..Ptr im|age_spac|
|00000a30| 65 3b 0d 09 52 67 6e 48 | 61 6e 64 6c 65 20 76 69 |e;..RgnH|andle vi|
|00000a40| 73 72 65 67 69 6f 6e 3b | 0d 09 73 68 6f 72 74 20 |sregion;|..short |
|00000a50| 65 72 72 2c 20 74 68 65 | 64 65 70 74 68 2c 20 69 |err, the|depth, i|
|00000a60| 3b 0d 09 43 54 61 62 48 | 61 6e 64 6c 65 20 6f 75 |;..CTabH|andle ou|
|00000a70| 72 43 4d 48 61 6e 64 6c | 65 3b 0d 0d 0d 09 2f 2a |rCMHandl|e;..../*|
|00000a80| 20 63 68 65 63 6b 20 74 | 68 61 74 20 74 68 65 20 | check t|hat the |
|00000a90| 61 72 67 75 6d 65 6e 74 | 73 20 6d 61 6b 65 73 20 |argument|s makes |
|00000aa0| 73 65 6e 73 65 20 2a 2f | 0d 09 69 66 20 28 20 28 |sense */|..if ( (|
|00000ab0| 2a 66 72 61 6d 65 29 2e | 74 6f 70 20 3e 3d 20 28 |*frame).|top >= (|
|00000ac0| 2a 66 72 61 6d 65 29 2e | 62 6f 74 74 6f 6d 20 0d |*frame).|bottom .|
|00000ad0| 09 09 7c 7c 20 28 2a 66 | 72 61 6d 65 29 2e 6c 65 |..|| (*f|rame).le|
|00000ae0| 66 74 20 3e 3d 20 28 2a | 66 72 61 6d 65 29 2e 72 |ft >= (*|frame).r|
|00000af0| 69 67 68 74 20 0d 09 09 | 7c 7c 20 70 69 63 48 20 |ight ...||| picH |
|00000b00| 3d 3d 20 4e 49 4c 20 29 | 0d 09 7b 0d 09 09 53 79 |== NIL )|..{...Sy|
|00000b10| 73 42 65 65 70 28 31 30 | 29 3b 0d 09 09 72 65 74 |sBeep(10|);...ret|
|00000b20| 75 72 6e 28 20 4e 49 4c | 20 29 3b 0d 09 7d 0d 0d |urn( NIL| );..}..|
|00000b30| 2f 2a 20 63 72 65 61 74 | 65 20 66 69 72 73 74 20 |/* creat|e first |
|00000b40| 6f 66 66 2d 73 63 72 65 | 65 6e 20 70 69 78 6d 61 |off-scre|en pixma|
|00000b50| 70 2c 20 75 73 69 6e 67 | 20 67 72 61 79 73 63 61 |p, using| graysca|
|00000b60| 6c 65 2c 20 74 6f 20 67 | 65 74 20 69 6d 61 67 65 |le, to g|et image|
|00000b70| 73 20 69 6e 74 6f 20 30 | 2d 32 35 35 20 69 6e 74 |s into 0|-255 int|
|00000b80| 65 6e 73 69 74 79 20 73 | 63 61 6c 65 20 2a 2f 0d |ensity s|cale */.|
|00000b90| 0d 09 6f 66 66 5f 70 6f | 72 74 20 3d 20 28 43 47 |..off_po|rt = (CG|
|00000ba0| 72 61 66 50 74 72 29 20 | 4e 65 77 50 74 72 28 20 |rafPtr) |NewPtr( |
|00000bb0| 73 69 7a 65 6f 66 28 43 | 47 72 61 66 50 6f 72 74 |sizeof(C|GrafPort|
|00000bc0| 29 20 29 3b 0d 0d 09 65 | 72 72 20 3d 20 4d 65 6d |) );...e|rr = Mem|
|00000bd0| 45 72 72 3b 0d 09 69 66 | 20 28 20 65 72 72 20 21 |Err;..if| ( err !|
|00000be0| 3d 20 6e 6f 45 72 72 20 | 29 0d 09 7b 0d 09 09 69 |= noErr |)..{...i|
|00000bf0| 66 20 28 20 6f 66 66 5f | 70 6f 72 74 20 21 3d 20 |f ( off_|port != |
|00000c00| 4e 49 4c 20 29 0d 09 09 | 7b 0d 09 09 09 44 69 73 |NIL )...|{....Dis|
|00000c10| 70 6f 73 50 74 72 20 28 | 6f 66 66 5f 70 6f 72 74 |posPtr (|off_port|
|00000c20| 29 3b 0d 09 09 7d 0d 09 | 09 44 5f 65 72 72 6f 72 |);...}..|.D_error|
|00000c30| 5f 61 6c 65 72 74 28 20 | 28 6c 6f 6e 67 29 20 65 |_alert( |(long) e|
|00000c40| 72 72 20 29 3b 0d 09 09 | 72 65 74 75 72 6e 28 4e |rr );...|return(N|
|00000c50| 49 4c 29 3b 0d 09 7d 0d | 09 65 6c 73 65 0d 09 7b |IL);..}.|.else..{|
|00000c60| 0d 09 09 6f 6c 64 64 65 | 76 69 63 65 20 3d 20 47 |...oldde|vice = G|
|00000c70| 65 74 47 44 65 76 69 63 | 65 28 29 3b 0d 09 09 47 |etGDevic|e();...G|
|00000c80| 65 74 50 6f 72 74 28 26 | 73 61 76 65 70 6f 72 74 |etPort(&|saveport|
|00000c90| 29 3b 0d 0d 09 09 53 65 | 74 47 44 65 76 69 63 65 |);....Se|tGDevice|
|00000ca0| 28 20 74 68 65 6d 61 78 | 64 65 76 69 63 65 20 29 |( themax|device )|
|00000cb0| 3b 0d 0d 09 09 4f 70 65 | 6e 43 50 6f 72 74 28 6f |;....Ope|nCPort(o|
|00000cc0| 66 66 5f 70 6f 72 74 29 | 3b 0d 0d 09 09 74 68 65 |ff_port)|;....the|
|00000cd0| 64 65 70 74 68 20 3d 20 | 28 2a 2a 6f 66 66 5f 70 |depth = |(**off_p|
|00000ce0| 6f 72 74 2d 3e 70 6f 72 | 74 50 69 78 4d 61 70 29 |ort->por|tPixMap)|
|00000cf0| 2e 70 69 78 65 6c 53 69 | 7a 65 3b 0d 09 09 6f 66 |.pixelSi|ze;...of|
|00000d00| 66 72 6f 77 62 79 74 65 | 73 20 3d 20 28 28 28 74 |frowbyte|s = (((t|
|00000d10| 68 65 64 65 70 74 68 20 | 2a 20 28 66 72 61 6d 65 |hedepth |* (frame|
|00000d20| 2d 3e 72 69 67 68 74 20 | 2d 20 66 72 61 6d 65 2d |->right |- frame-|
|00000d30| 3e 6c 65 66 74 29 29 20 | 2b 20 31 35 29 20 3e 3e |>left)) |+ 15) >>|
|00000d40| 20 34 29 20 3c 3c 20 31 | 3b 0d 09 09 73 69 7a 65 | 4) << 1|;...size|
|00000d50| 20 3d 20 28 66 72 61 6d | 65 2d 3e 62 6f 74 74 6f | = (fram|e->botto|
|00000d60| 6d 20 2d 20 66 72 61 6d | 65 2d 3e 74 6f 70 29 20 |m - fram|e->top) |
|00000d70| 2a 20 28 6c 6f 6e 67 29 | 20 6f 66 66 72 6f 77 62 |* (long)| offrowb|
|00000d80| 79 74 65 73 3b 0d 0d 09 | 09 6f 66 66 5f 70 6f 72 |ytes;...|.off_por|
|00000d90| 74 2d 3e 70 6f 72 74 50 | 69 78 4d 61 70 20 3d 20 |t->portP|ixMap = |
|00000da0| 4e 65 77 50 69 78 4d 61 | 70 28 29 3b 20 2f 2a 20 |NewPixMa|p(); /* |
|00000db0| 61 73 73 75 6d 65 20 65 | 72 72 6f 72 2d 66 72 65 |assume e|rror-fre|
|00000dc0| 65 20 3f 20 2a 2f 0d 09 | 09 69 6d 61 67 65 5f 73 |e ? */..|.image_s|
|00000dd0| 70 61 63 65 20 3d 20 4e | 65 77 50 74 72 28 20 73 |pace = N|ewPtr( s|
|00000de0| 69 7a 65 20 29 3b 0d 09 | 0d 09 09 65 72 72 20 3d |ize );..|...err =|
|00000df0| 20 4d 65 6d 45 72 72 3b | 0d 09 09 69 66 20 28 20 | MemErr;|...if ( |
|00000e00| 65 72 72 20 21 3d 20 6e | 6f 45 72 72 20 29 0d 09 |err != n|oErr )..|
|00000e10| 09 7b 0d 09 09 09 53 65 | 74 47 44 65 76 69 63 65 |.{....Se|tGDevice|
|00000e20| 28 6f 6c 64 64 65 76 69 | 63 65 29 3b 0d 09 09 09 |(olddevi|ce);....|
|00000e30| 53 65 74 50 6f 72 74 28 | 73 61 76 65 70 6f 72 74 |SetPort(|saveport|
|00000e40| 29 3b 0d 09 09 09 69 66 | 20 28 20 6f 66 66 5f 70 |);....if| ( off_p|
|00000e50| 6f 72 74 20 21 3d 20 4e | 49 4c 20 29 0d 09 09 09 |ort != N|IL )....|
|00000e60| 7b 0d 09 09 09 09 44 69 | 73 70 6f 73 50 74 72 20 |{.....Di|sposPtr |
|00000e70| 28 6f 66 66 5f 70 6f 72 | 74 29 3b 0d 09 09 09 7d |(off_por|t);....}|
|00000e80| 0d 09 09 09 69 66 20 28 | 20 69 6d 61 67 65 5f 73 |....if (| image_s|
|00000e90| 70 61 63 65 20 21 3d 20 | 4e 49 4c 20 29 0d 09 09 |pace != |NIL )...|
|00000ea0| 09 7b 0d 09 09 09 09 44 | 69 73 70 6f 73 50 74 72 |.{.....D|isposPtr|
|00000eb0| 20 28 69 6d 61 67 65 5f | 73 70 61 63 65 29 3b 0d | (image_|space);.|
|00000ec0| 09 09 09 7d 0d 09 09 09 | 44 5f 65 72 72 6f 72 5f |...}....|D_error_|
|00000ed0| 61 6c 65 72 74 28 20 28 | 6c 6f 6e 67 29 20 65 72 |alert( (|long) er|
|00000ee0| 72 20 29 3b 0d 09 09 09 | 72 65 74 75 72 6e 28 4e |r );....|return(N|
|00000ef0| 49 4c 29 3b 0d 09 09 7d | 0d 09 09 65 6c 73 65 0d |IL);...}|...else.|
|00000f00| 09 09 7b 0d 09 09 09 28 | 2a 2a 28 6f 66 66 5f 70 |..{....(|**(off_p|
|00000f10| 6f 72 74 2d 3e 70 6f 72 | 74 50 69 78 4d 61 70 29 |ort->por|tPixMap)|
|00000f20| 29 2e 72 6f 77 42 79 74 | 65 73 20 3d 20 6f 66 66 |).rowByt|es = off|
|00000f30| 72 6f 77 62 79 74 65 73 | 20 2b 20 30 78 38 30 30 |rowbytes| + 0x800|
|00000f40| 30 3b 0d 09 09 09 28 2a | 2a 28 6f 66 66 5f 70 6f |0;....(*|*(off_po|
|00000f50| 72 74 2d 3e 70 6f 72 74 | 50 69 78 4d 61 70 29 29 |rt->port|PixMap))|
|00000f60| 2e 62 61 73 65 41 64 64 | 72 20 3d 20 69 6d 61 67 |.baseAdd|r = imag|
|00000f70| 65 5f 73 70 61 63 65 3b | 0d 09 09 09 28 2a 2a 28 |e_space;|....(**(|
|00000f80| 6f 66 66 5f 70 6f 72 74 | 2d 3e 70 6f 72 74 50 69 |off_port|->portPi|
|00000f90| 78 4d 61 70 29 29 2e 62 | 6f 75 6e 64 73 20 3d 20 |xMap)).b|ounds = |
|00000fa0| 2a 66 72 61 6d 65 3b 20 | 0d 09 09 20 20 20 20 0d |*frame; |...    .|
|00000fb0| 09 09 09 6f 75 72 43 4d | 48 61 6e 64 6c 65 20 3d |...ourCM|Handle =|
|00000fc0| 20 28 2a 2a 28 2a 2a 74 | 68 65 6d 61 78 64 65 76 | (**(**t|hemaxdev|
|00000fd0| 69 63 65 29 2e 67 64 50 | 4d 61 70 29 2e 70 6d 54 |ice).gdP|Map).pmT|
|00000fe0| 61 62 6c 65 3b 0d 09 09 | 09 65 72 72 20 3d 20 48 |able;...|.err = H|
|00000ff0| 61 6e 64 54 6f 48 61 6e | 64 28 20 26 20 6f 75 72 |andToHan|d( & our|
|00001000| 43 4d 48 61 6e 64 6c 65 | 20 29 3b 0d 0d 09 09 09 |CMHandle| );.....|
|00001010| 69 66 20 28 20 65 72 72 | 20 21 3d 20 6e 6f 45 72 |if ( err| != noEr|
|00001020| 72 20 29 0d 09 09 09 7b | 0d 09 09 09 09 53 65 74 |r )....{|.....Set|
|00001030| 47 44 65 76 69 63 65 28 | 6f 6c 64 64 65 76 69 63 |GDevice(|olddevic|
|00001040| 65 29 3b 0d 09 09 09 09 | 53 65 74 50 6f 72 74 28 |e);.....|SetPort(|
|00001050| 73 61 76 65 70 6f 72 74 | 29 3b 0d 09 09 09 09 69 |saveport|);.....i|
|00001060| 66 20 28 20 6f 66 66 5f | 70 6f 72 74 20 21 3d 20 |f ( off_|port != |
|00001070| 4e 49 4c 20 29 0d 09 09 | 09 09 7b 0d 09 09 09 09 |NIL )...|..{.....|
|00001080| 09 44 69 73 70 6f 73 50 | 74 72 20 28 6f 66 66 5f |.DisposP|tr (off_|
|00001090| 70 6f 72 74 29 3b 0d 09 | 09 09 09 7d 0d 09 09 09 |port);..|...}....|
|000010a0| 09 69 66 20 28 20 69 6d | 61 67 65 5f 73 70 61 63 |.if ( im|age_spac|
|000010b0| 65 20 21 3d 20 4e 49 4c | 20 29 0d 09 09 09 09 7b |e != NIL| ).....{|
|000010c0| 0d 09 09 09 09 09 44 69 | 73 70 6f 73 50 74 72 20 |......Di|sposPtr |
|000010d0| 28 69 6d 61 67 65 5f 73 | 70 61 63 65 29 3b 0d 09 |(image_s|pace);..|
|000010e0| 09 09 09 7d 0d 09 09 09 | 09 44 5f 65 72 72 6f 72 |...}....|.D_error|
|000010f0| 5f 61 6c 65 72 74 28 20 | 28 6c 6f 6e 67 29 20 65 |_alert( |(long) e|
|00001100| 72 72 20 29 3b 0d 09 09 | 09 09 72 65 74 75 72 6e |rr );...|..return|
|00001110| 28 4e 49 4c 29 3b 0d 09 | 09 09 7d 0d 09 09 09 65 |(NIL);..|..}....e|
|00001120| 6c 73 65 0d 09 09 09 7b | 0d 09 09 09 09 66 6f 72 |lse....{|.....for|
|00001130| 20 28 20 69 20 3d 20 30 | 3b 20 69 20 3c 3d 20 28 | ( i = 0|; i <= (|
|00001140| 2a 2a 6f 75 72 43 4d 48 | 61 6e 64 6c 65 29 2e 63 |**ourCMH|andle).c|
|00001150| 74 53 69 7a 65 3b 20 2b | 2b 69 20 29 0d 09 09 09 |tSize; +|+i )....|
|00001160| 09 7b 0d 09 09 09 09 09 | 28 2a 2a 6f 75 72 43 4d |.{......|(**ourCM|
|00001170| 48 61 6e 64 6c 65 29 2e | 63 74 54 61 62 6c 65 5b |Handle).|ctTable[|
|00001180| 69 5d 2e 76 61 6c 75 65 | 20 3d 20 69 3b 0d 09 09 |i].value| = i;...|
|00001190| 09 09 7d 0d 09 09 09 09 | 28 2a 2a 6f 75 72 43 4d |..}.....|(**ourCM|
|000011a0| 48 61 6e 64 6c 65 29 2e | 63 74 46 6c 61 67 73 20 |Handle).|ctFlags |
|000011b0| 26 3d 20 30 78 37 66 66 | 66 3b 0d 09 09 09 09 28 |&= 0x7ff|f;.....(|
|000011c0| 2a 2a 6f 75 72 43 4d 48 | 61 6e 64 6c 65 29 2e 63 |**ourCMH|andle).c|
|000011d0| 74 53 65 65 64 20 3d 20 | 47 65 74 43 54 53 65 65 |tSeed = |GetCTSee|
|000011e0| 64 28 29 3b 0d 09 09 09 | 09 2f 2a 20 74 68 65 20 |d();....|./* the |
|000011f0| 61 62 6f 76 65 20 63 6f | 64 65 20 69 73 20 6e 65 |above co|de is ne|
|00001200| 65 64 65 64 20 66 6f 72 | 20 63 6f 6e 76 65 72 74 |eded for| convert|
|00001210| 69 6e 67 20 67 64 65 76 | 69 63 65 20 63 6c 75 74 |ing gdev|ice clut|
|00001220| 73 20 74 6f 20 70 69 78 | 6d 61 70 20 63 6c 75 74 |s to pix|map clut|
|00001230| 73 20 2a 2f 0d 0d 09 09 | 09 09 28 2a 2a 28 2a 6f |s */....|..(**(*o|
|00001240| 66 66 5f 70 6f 72 74 29 | 2e 70 6f 72 74 50 69 78 |ff_port)|.portPix|
|00001250| 4d 61 70 29 2e 70 6d 54 | 61 62 6c 65 20 3d 20 6f |Map).pmT|able = o|
|00001260| 75 72 43 4d 48 61 6e 64 | 6c 65 3b 0d 0d 09 09 09 |urCMHand|le;.....|
|00001270| 09 53 65 74 50 6f 72 74 | 28 28 47 72 61 66 50 74 |.SetPort|((GrafPt|
|00001280| 72 29 20 6f 66 66 5f 70 | 6f 72 74 29 3b 0d 0d 09 |r) off_p|ort);...|
|00001290| 09 09 09 52 65 63 74 52 | 67 6e 28 6f 66 66 5f 70 |...RectR|gn(off_p|
|000012a0| 6f 72 74 2d 3e 76 69 73 | 52 67 6e 2c 20 66 72 61 |ort->vis|Rgn, fra|
|000012b0| 6d 65 29 3b 0d 09 09 09 | 09 43 6c 69 70 52 65 63 |me);....|.ClipRec|
|000012c0| 74 28 20 66 72 61 6d 65 | 20 29 3b 0d 09 09 09 0d |t( frame| );.....|
|000012d0| 09 09 09 09 44 72 61 77 | 50 69 63 74 75 72 65 28 |....Draw|Picture(|
|000012e0| 70 69 63 48 2c 20 66 72 | 61 6d 65 29 3b 0d 09 09 |picH, fr|ame);...|
|000012f0| 09 09 53 65 74 47 44 65 | 76 69 63 65 28 6f 6c 64 |..SetGDe|vice(old|
|00001300| 64 65 76 69 63 65 29 3b | 0d 0d 09 09 09 09 53 65 |device);|......Se|
|00001310| 74 50 6f 72 74 28 73 61 | 76 65 70 6f 72 74 29 3b |tPort(sa|veport);|
|00001320| 0d 0d 09 09 09 09 72 65 | 74 75 72 6e 28 20 6f 66 |......re|turn( of|
|00001330| 66 5f 70 6f 72 74 20 29 | 3b 0d 09 09 09 7d 0d 09 |f_port )|;....}..|
|00001340| 09 7d 0d 09 7d 0d 7d 0d | 0d 76 6f 69 64 20 61 64 |.}..}.}.|.void ad|
|00001350| 64 5f 62 6d 61 70 73 28 | 20 20 70 72 6f 74 6f 6e |d_bmaps(|  proton|
|00001360| 5f 62 6d 61 70 2c 20 20 | 70 72 6f 74 6f 6e 5f 72 |_bmap,  |proton_r|
|00001370| 65 63 74 2c 20 70 72 5f | 6f 66 66 5f 74 6f 70 2c |ect, pr_|off_top,|
|00001380| 20 70 72 5f 6f 66 66 5f | 6c 65 66 74 2c 0d 09 09 | pr_off_|left,...|
|00001390| 09 09 66 6c 6f 75 72 69 | 6e 65 5f 62 6d 61 70 2c |..flouri|ne_bmap,|
|000013a0| 20 20 66 6c 6f 75 72 69 | 6e 65 5f 72 65 63 74 2c |  flouri|ne_rect,|
|000013b0| 20 66 6c 5f 6f 66 66 5f | 74 6f 70 2c 20 66 6c 5f | fl_off_|top, fl_|
|000013c0| 6f 66 66 5f 6c 65 66 74 | 2c 0d 09 09 09 09 20 72 |off_left|,..... r|
|000013d0| 65 73 75 6c 74 5f 62 6d | 61 70 2c 20 20 72 65 73 |esult_bm|ap,  res|
|000013e0| 75 6c 74 5f 72 65 63 74 | 2c 20 74 68 65 6d 61 78 |ult_rect|, themax|
|000013f0| 64 65 76 69 63 65 20 29 | 0d 2f 2a 20 63 72 65 61 |device )|./* crea|
|00001400| 74 65 20 6f 66 66 2d 73 | 63 72 65 65 6e 20 70 69 |te off-s|creen pi|
|00001410| 78 6d 61 70 20 61 6e 64 | 20 74 68 65 20 6f 74 68 |xmap and| the oth|
|00001420| 65 72 20 74 77 6f 20 70 | 69 78 6d 61 70 73 20 69 |er two p|ixmaps i|
|00001430| 6e 74 6f 20 69 74 20 2a | 2f 0d 09 43 47 72 61 66 |nto it *|/..CGraf|
|00001440| 50 74 72 20 70 72 6f 74 | 6f 6e 5f 62 6d 61 70 3b |Ptr prot|on_bmap;|
|00001450| 0d 09 52 65 63 74 20 2a | 70 72 6f 74 6f 6e 5f 72 |..Rect *|proton_r|
|00001460| 65 63 74 3b 0d 09 43 47 | 72 61 66 50 74 72 20 66 |ect;..CG|rafPtr f|
|00001470| 6c 6f 75 72 69 6e 65 5f | 62 6d 61 70 3b 0d 09 52 |lourine_|bmap;..R|
|00001480| 65 63 74 20 2a 66 6c 6f | 75 72 69 6e 65 5f 72 65 |ect *flo|urine_re|
|00001490| 63 74 3b 0d 09 43 47 72 | 61 66 50 74 72 20 2a 72 |ct;..CGr|afPtr *r|
|000014a0| 65 73 75 6c 74 5f 62 6d | 61 70 3b 0d 09 52 65 63 |esult_bm|ap;..Rec|
|000014b0| 74 20 2a 72 65 73 75 6c | 74 5f 72 65 63 74 3b 0d |t *resul|t_rect;.|
|000014c0| 09 73 68 6f 72 74 20 70 | 72 5f 6f 66 66 5f 74 6f |.short p|r_off_to|
|000014d0| 70 2c 20 70 72 5f 6f 66 | 66 5f 6c 65 66 74 3b 0d |p, pr_of|f_left;.|
|000014e0| 09 73 68 6f 72 74 20 66 | 6c 5f 6f 66 66 5f 74 6f |.short f|l_off_to|
|000014f0| 70 2c 20 66 6c 5f 6f 66 | 66 5f 6c 65 66 74 3b 0d |p, fl_of|f_left;.|
|00001500| 09 47 44 48 61 6e 64 6c | 65 20 74 68 65 6d 61 78 |.GDHandl|e themax|
|00001510| 64 65 76 69 63 65 3b 0d | 7b 0d 09 43 47 72 61 66 |device;.|{..CGraf|
|00001520| 50 74 72 20 6f 66 66 5f | 70 6f 72 74 3b 0d 09 47 |Ptr off_|port;..G|
|00001530| 44 48 61 6e 64 6c 65 20 | 6f 6c 64 64 65 76 69 63 |DHandle |olddevic|
|00001540| 65 3b 0d 09 47 72 61 66 | 50 74 72 20 73 61 76 65 |e;..Graf|Ptr save|
|00001550| 70 6f 72 74 3b 0d 09 6c | 6f 6e 67 20 73 69 7a 65 |port;..l|ong size|
|00001560| 2c 20 6f 66 66 72 6f 77 | 62 79 74 65 73 3b 0d 09 |, offrow|bytes;..|
|00001570| 73 68 6f 72 74 20 72 5f | 74 6f 70 2c 20 72 5f 6c |short r_|top, r_l|
|00001580| 65 66 74 3b 0d 09 50 74 | 72 20 69 6d 61 67 65 5f |eft;..Pt|r image_|
|00001590| 73 70 61 63 65 3b 0d 09 | 52 65 63 74 20 70 72 5f |space;..|Rect pr_|
|000015a0| 6f 66 66 2c 20 66 6c 5f | 6f 66 66 3b 0d 09 52 67 |off, fl_|off;..Rg|
|000015b0| 6e 48 61 6e 64 6c 65 20 | 76 69 73 72 65 67 69 6f |nHandle |visregio|
|000015c0| 6e 3b 0d 0d 09 73 68 6f | 72 74 20 65 72 72 2c 20 |n;...sho|rt err, |
|000015d0| 74 68 65 64 65 70 74 68 | 2c 20 69 3b 0d 09 43 54 |thedepth|, i;..CT|
|000015e0| 61 62 48 61 6e 64 6c 65 | 20 6f 75 72 43 4d 48 61 |abHandle| ourCMHa|
|000015f0| 6e 64 6c 65 3b 0d 0d 09 | 69 66 20 28 20 70 72 5f |ndle;...|if ( pr_|
|00001600| 6f 66 66 5f 74 6f 70 20 | 3c 20 70 72 6f 74 6f 6e |off_top |< proton|
|00001610| 5f 72 65 63 74 2d 3e 62 | 6f 74 74 6f 6d 20 20 20 |_rect->b|ottom   |
|00001620| 20 20 20 2f 2a 20 74 65 | 73 74 20 6f 66 66 73 65 |   /* te|st offse|
|00001630| 74 73 20 66 6f 72 20 72 | 65 61 73 6f 6e 61 62 6c |ts for r|easonabl|
|00001640| 65 6e 65 73 73 20 2a 2f | 0d 09 09 26 26 20 70 72 |eness */|...&& pr|
|00001650| 5f 6f 66 66 5f 6c 65 66 | 74 20 3c 20 70 72 6f 74 |_off_lef|t < prot|
|00001660| 6f 6e 5f 72 65 63 74 2d | 3e 72 69 67 68 74 0d 09 |on_rect-|>right..|
|00001670| 09 26 26 20 66 6c 5f 6f | 66 66 5f 74 6f 70 20 3c |.&& fl_o|ff_top <|
|00001680| 20 66 6c 6f 75 72 69 6e | 65 5f 72 65 63 74 2d 3e | flourin|e_rect->|
|00001690| 62 6f 74 74 6f 6d 0d 09 | 09 26 26 20 66 6c 5f 6f |bottom..|.&& fl_o|
|000016a0| 66 66 5f 6c 65 66 74 20 | 3c 20 66 6c 6f 75 72 69 |ff_left |< flouri|
|000016b0| 6e 65 5f 72 65 63 74 2d | 3e 72 69 67 68 74 20 0d |ne_rect-|>right .|
|000016c0| 09 09 26 26 20 70 72 6f | 74 6f 6e 5f 72 65 63 74 |..&& pro|ton_rect|
|000016d0| 2d 3e 62 6f 74 74 6f 6d | 20 3e 20 70 72 6f 74 6f |->bottom| > proto|
|000016e0| 6e 5f 72 65 63 74 2d 3e | 74 6f 70 20 2f 2a 20 74 |n_rect->|top /* t|
|000016f0| 65 73 74 20 66 72 61 6d | 65 73 20 66 6f 72 20 73 |est fram|es for s|
|00001700| 61 6e 69 74 79 20 2a 2f | 0d 09 09 26 26 20 70 72 |anity */|...&& pr|
|00001710| 6f 74 6f 6e 5f 72 65 63 | 74 2d 3e 72 69 67 68 74 |oton_rec|t->right|
|00001720| 20 3e 20 70 72 6f 74 6f | 6e 5f 72 65 63 74 2d 3e | > proto|n_rect->|
|00001730| 6c 65 66 74 0d 09 09 26 | 26 20 66 6c 6f 75 72 69 |left...&|& flouri|
|00001740| 6e 65 5f 72 65 63 74 2d | 3e 62 6f 74 74 6f 6d 20 |ne_rect-|>bottom |
|00001750| 3e 20 66 6c 6f 75 72 69 | 6e 65 5f 72 65 63 74 2d |> flouri|ne_rect-|
|00001760| 3e 74 6f 70 0d 09 09 26 | 26 20 66 6c 6f 75 72 69 |>top...&|& flouri|
|00001770| 6e 65 5f 72 65 63 74 2d | 3e 72 69 67 68 74 20 3e |ne_rect-|>right >|
|00001780| 20 66 6c 6f 75 72 69 6e | 65 5f 72 65 63 74 2d 3e | flourin|e_rect->|
|00001790| 6c 65 66 74 20 0d 09 09 | 26 26 20 70 72 6f 74 6f |left ...|&& proto|
|000017a0| 6e 5f 72 65 63 74 2d 3e | 74 6f 70 20 3d 3d 20 30 |n_rect->|top == 0|
|000017b0| 09 09 09 09 09 2f 2a 20 | 74 68 65 73 65 20 73 68 |...../* |these sh|
|000017c0| 6f 75 6c 64 20 61 6c 77 | 61 79 73 20 62 65 20 30 |ould alw|ays be 0|
|000017d0| 20 2a 2f 0d 09 09 26 26 | 20 70 72 6f 74 6f 6e 5f | */...&&| proton_|
|000017e0| 72 65 63 74 2d 3e 6c 65 | 66 74 20 3d 3d 20 30 0d |rect->le|ft == 0.|
|000017f0| 09 09 26 26 20 66 6c 6f | 75 72 69 6e 65 5f 72 65 |..&& flo|urine_re|
|00001800| 63 74 2d 3e 74 6f 70 20 | 3d 3d 20 30 0d 09 09 26 |ct->top |== 0...&|
|00001810| 26 20 66 6c 6f 75 72 69 | 6e 65 5f 72 65 63 74 2d |& flouri|ne_rect-|
|00001820| 3e 6c 65 66 74 20 3d 3d | 20 30 20 29 0d 09 7b 0d |>left ==| 0 )..{.|
|00001830| 09 09 72 65 73 75 6c 74 | 5f 72 65 63 74 2d 3e 74 |..result|_rect->t|
|00001840| 6f 70 20 3d 20 30 3b 0d | 09 09 72 65 73 75 6c 74 |op = 0;.|..result|
|00001850| 5f 72 65 63 74 2d 3e 6c | 65 66 74 20 3d 20 30 3b |_rect->l|eft = 0;|
|00001860| 0d 09 09 70 72 5f 6f 66 | 66 20 3d 20 2a 70 72 6f |...pr_of|f = *pro|
|00001870| 74 6f 6e 5f 72 65 63 74 | 3b 0d 09 09 66 6c 5f 6f |ton_rect|;...fl_o|
|00001880| 66 66 20 3d 20 2a 66 6c | 6f 75 72 69 6e 65 5f 72 |ff = *fl|ourine_r|
|00001890| 65 63 74 3b 0d 09 09 70 | 72 5f 6f 66 66 2e 74 6f |ect;...p|r_off.to|
|000018a0| 70 20 2b 3d 20 70 72 5f | 6f 66 66 5f 74 6f 70 3b |p += pr_|off_top;|
|000018b0| 0d 09 09 70 72 5f 6f 66 | 66 2e 62 6f 74 74 6f 6d |...pr_of|f.bottom|
|000018c0| 20 2b 3d 20 70 72 5f 6f | 66 66 5f 74 6f 70 3b 0d | += pr_o|ff_top;.|
|000018d0| 09 09 70 72 5f 6f 66 66 | 2e 6c 65 66 74 20 2b 3d |..pr_off|.left +=|
|000018e0| 20 70 72 5f 6f 66 66 5f | 6c 65 66 74 3b 0d 09 09 | pr_off_|left;...|
|000018f0| 70 72 5f 6f 66 66 2e 72 | 69 67 68 74 20 2b 3d 20 |pr_off.r|ight += |
|00001900| 70 72 5f 6f 66 66 5f 6c | 65 66 74 3b 0d 09 09 66 |pr_off_l|eft;...f|
|00001910| 6c 5f 6f 66 66 2e 74 6f | 70 20 2b 3d 20 66 6c 5f |l_off.to|p += fl_|
|00001920| 6f 66 66 5f 74 6f 70 3b | 0d 09 09 66 6c 5f 6f 66 |off_top;|...fl_of|
|00001930| 66 2e 62 6f 74 74 6f 6d | 20 2b 3d 20 66 6c 5f 6f |f.bottom| += fl_o|
|00001940| 66 66 5f 74 6f 70 3b 0d | 09 09 66 6c 5f 6f 66 66 |ff_top;.|..fl_off|
|00001950| 2e 72 69 67 68 74 20 2b | 3d 20 66 6c 5f 6f 66 66 |.right +|= fl_off|
|00001960| 5f 6c 65 66 74 3b 0d 09 | 09 66 6c 5f 6f 66 66 2e |_left;..|.fl_off.|
|00001970| 6c 65 66 74 20 2b 3d 20 | 66 6c 5f 6f 66 66 5f 6c |left += |fl_off_l|
|00001980| 65 66 74 3b 0d 09 09 72 | 5f 74 6f 70 20 3d 20 73 |eft;...r|_top = s|
|00001990| 68 6f 72 74 5f 6d 61 78 | 28 20 70 72 5f 6f 66 66 |hort_max|( pr_off|
|000019a0| 5f 74 6f 70 2c 20 66 6c | 5f 6f 66 66 5f 74 6f 70 |_top, fl|_off_top|
|000019b0| 20 29 3b 0d 09 09 72 5f | 6c 65 66 74 20 3d 20 73 | );...r_|left = s|
|000019c0| 68 6f 72 74 5f 6d 61 78 | 28 20 70 72 5f 6f 66 66 |hort_max|( pr_off|
|000019d0| 5f 6c 65 66 74 2c 20 66 | 6c 5f 6f 66 66 5f 6c 65 |_left, f|l_off_le|
|000019e0| 66 74 20 29 3b 0d 09 09 | 72 65 73 75 6c 74 5f 72 |ft );...|result_r|
|000019f0| 65 63 74 2d 3e 72 69 67 | 68 74 20 3d 20 72 5f 6c |ect->rig|ht = r_l|
|00001a00| 65 66 74 20 2b 20 73 68 | 6f 72 74 5f 6d 61 78 28 |eft + sh|ort_max(|
|00001a10| 20 70 72 6f 74 6f 6e 5f | 72 65 63 74 2d 3e 72 69 | proton_|rect->ri|
|00001a20| 67 68 74 20 2d 20 70 72 | 5f 6f 66 66 5f 6c 65 66 |ght - pr|_off_lef|
|00001a30| 74 2c 0d 09 09 09 66 6c | 6f 75 72 69 6e 65 5f 72 |t,....fl|ourine_r|
|00001a40| 65 63 74 2d 3e 72 69 67 | 68 74 20 2d 20 66 6c 5f |ect->rig|ht - fl_|
|00001a50| 6f 66 66 5f 6c 65 66 74 | 20 29 3b 0d 09 09 72 65 |off_left| );...re|
|00001a60| 73 75 6c 74 5f 72 65 63 | 74 2d 3e 62 6f 74 74 6f |sult_rec|t->botto|
|00001a70| 6d 20 3d 20 72 5f 74 6f | 70 20 2b 20 73 68 6f 72 |m = r_to|p + shor|
|00001a80| 74 5f 6d 61 78 28 20 70 | 72 6f 74 6f 6e 5f 72 65 |t_max( p|roton_re|
|00001a90| 63 74 2d 3e 62 6f 74 74 | 6f 6d 20 2d 20 70 72 5f |ct->bott|om - pr_|
|00001aa0| 6f 66 66 5f 74 6f 70 2c | 0d 09 09 09 66 6c 6f 75 |off_top,|....flou|
|00001ab0| 72 69 6e 65 5f 72 65 63 | 74 2d 3e 62 6f 74 74 6f |rine_rec|t->botto|
|00001ac0| 6d 20 2d 20 66 6c 5f 6f | 66 66 5f 74 6f 70 20 29 |m - fl_o|ff_top )|
|00001ad0| 3b 0d 0d 09 09 6f 66 66 | 5f 70 6f 72 74 20 3d 20 |;....off|_port = |
|00001ae0| 28 43 47 72 61 66 50 74 | 72 29 20 4e 65 77 50 74 |(CGrafPt|r) NewPt|
|00001af0| 72 28 20 73 69 7a 65 6f | 66 28 43 47 72 61 66 50 |r( sizeo|f(CGrafP|
|00001b00| 6f 72 74 29 20 29 3b 0d | 09 09 0d 09 09 65 72 72 |ort) );.|.....err|
|00001b10| 20 3d 20 4d 65 6d 45 72 | 72 3b 0d 09 09 69 66 20 | = MemEr|r;...if |
|00001b20| 28 20 65 72 72 20 21 3d | 20 6e 6f 45 72 72 20 29 |( err !=| noErr )|
|00001b30| 0d 09 09 7b 0d 09 09 09 | 69 66 20 28 20 6f 66 66 |...{....|if ( off|
|00001b40| 5f 70 6f 72 74 20 21 3d | 20 4e 49 4c 20 29 0d 09 |_port !=| NIL )..|
|00001b50| 09 09 7b 0d 09 09 09 09 | 44 69 73 70 6f 73 50 74 |..{.....|DisposPt|
|00001b60| 72 20 28 6f 66 66 5f 70 | 6f 72 74 29 3b 0d 09 09 |r (off_p|ort);...|
|00001b70| 09 7d 0d 09 09 09 44 5f | 65 72 72 6f 72 5f 61 6c |.}....D_|error_al|
|00001b80| 65 72 74 28 20 28 6c 6f | 6e 67 29 20 65 72 72 20 |ert( (lo|ng) err |
|00001b90| 29 3b 0d 09 09 09 2a 72 | 65 73 75 6c 74 5f 62 6d |);....*r|esult_bm|
|00001ba0| 61 70 20 3d 20 4e 49 4c | 3b 0d 09 09 09 72 65 74 |ap = NIL|;....ret|
|00001bb0| 75 72 6e 3b 0d 09 09 7d | 0d 09 09 65 6c 73 65 0d |urn;...}|...else.|
|00001bc0| 09 09 7b 0d 09 09 09 6f | 6c 64 64 65 76 69 63 65 |..{....o|lddevice|
|00001bd0| 20 3d 20 47 65 74 47 44 | 65 76 69 63 65 28 29 3b | = GetGD|evice();|
|00001be0| 0d 09 09 09 47 65 74 50 | 6f 72 74 28 26 73 61 76 |....GetP|ort(&sav|
|00001bf0| 65 70 6f 72 74 29 3b 0d | 0d 09 09 09 53 65 74 47 |eport);.|....SetG|
|00001c00| 44 65 76 69 63 65 28 20 | 74 68 65 6d 61 78 64 65 |Device( |themaxde|
|00001c10| 76 69 63 65 20 29 3b 0d | 0d 09 09 09 4f 70 65 6e |vice );.|....Open|
|00001c20| 43 50 6f 72 74 28 6f 66 | 66 5f 70 6f 72 74 29 3b |CPort(of|f_port);|
|00001c30| 0d 09 09 09 74 68 65 64 | 65 70 74 68 20 3d 20 28 |....thed|epth = (|
|00001c40| 2a 2a 6f 66 66 5f 70 6f | 72 74 2d 3e 70 6f 72 74 |**off_po|rt->port|
|00001c50| 50 69 78 4d 61 70 29 2e | 70 69 78 65 6c 53 69 7a |PixMap).|pixelSiz|
|00001c60| 65 3b 0d 09 09 09 6f 66 | 66 72 6f 77 62 79 74 65 |e;....of|frowbyte|
|00001c70| 73 20 3d 20 28 28 28 74 | 68 65 64 65 70 74 68 20 |s = (((t|hedepth |
|00001c80| 2a 20 28 72 65 73 75 6c | 74 5f 72 65 63 74 2d 3e |* (resul|t_rect->|
|00001c90| 72 69 67 68 74 20 2d 20 | 72 65 73 75 6c 74 5f 72 |right - |result_r|
|00001ca0| 65 63 74 2d 3e 6c 65 66 | 74 29 29 20 2b 20 31 35 |ect->lef|t)) + 15|
|00001cb0| 29 20 3e 3e 20 34 29 20 | 3c 3c 20 31 3b 0d 09 09 |) >> 4) |<< 1;...|
|00001cc0| 09 73 69 7a 65 20 3d 20 | 28 72 65 73 75 6c 74 5f |.size = |(result_|
|00001cd0| 72 65 63 74 2d 3e 62 6f | 74 74 6f 6d 20 2d 20 72 |rect->bo|ttom - r|
|00001ce0| 65 73 75 6c 74 5f 72 65 | 63 74 2d 3e 74 6f 70 29 |esult_re|ct->top)|
|00001cf0| 20 2a 20 28 6c 6f 6e 67 | 29 20 6f 66 66 72 6f 77 | * (long|) offrow|
|00001d00| 62 79 74 65 73 3b 0d 0d | 09 09 09 6f 66 66 5f 70 |bytes;..|...off_p|
|00001d10| 6f 72 74 2d 3e 70 6f 72 | 74 50 69 78 4d 61 70 20 |ort->por|tPixMap |
|00001d20| 3d 20 4e 65 77 50 69 78 | 4d 61 70 28 29 3b 20 2f |= NewPix|Map(); /|
|00001d30| 2a 20 61 73 73 75 6d 65 | 20 65 72 72 6f 72 2d 66 |* assume| error-f|
|00001d40| 72 65 65 20 3f 20 2a 2f | 0d 09 09 09 69 6d 61 67 |ree ? */|....imag|
|00001d50| 65 5f 73 70 61 63 65 20 | 3d 20 4e 65 77 50 74 72 |e_space |= NewPtr|
|00001d60| 28 20 73 69 7a 65 20 29 | 3b 0d 09 09 09 65 72 72 |( size )|;....err|
|00001d70| 20 3d 20 4d 65 6d 45 72 | 72 3b 0d 09 09 09 69 66 | = MemEr|r;....if|
|00001d80| 20 28 20 65 72 72 20 21 | 3d 20 6e 6f 45 72 72 20 | ( err !|= noErr |
|00001d90| 29 0d 09 09 09 7b 0d 09 | 09 09 09 53 65 74 47 44 |)....{..|...SetGD|
|00001da0| 65 76 69 63 65 28 6f 6c | 64 64 65 76 69 63 65 29 |evice(ol|ddevice)|
|00001db0| 3b 0d 09 09 09 09 53 65 | 74 50 6f 72 74 28 73 61 |;.....Se|tPort(sa|
|00001dc0| 76 65 70 6f 72 74 29 3b | 0d 09 09 09 09 69 66 20 |veport);|.....if |
|00001dd0| 28 20 6f 66 66 5f 70 6f | 72 74 20 21 3d 20 4e 49 |( off_po|rt != NI|
|00001de0| 4c 20 29 0d 09 09 09 09 | 7b 0d 09 09 09 09 09 44 |L ).....|{......D|
|00001df0| 69 73 70 6f 73 50 74 72 | 20 28 6f 66 66 5f 70 6f |isposPtr| (off_po|
|00001e00| 72 74 29 3b 0d 09 09 09 | 09 7d 0d 09 09 09 09 69 |rt);....|.}.....i|
|00001e10| 66 20 28 20 69 6d 61 67 | 65 5f 73 70 61 63 65 20 |f ( imag|e_space |
|00001e20| 21 3d 20 4e 49 4c 20 29 | 0d 09 09 09 09 7b 0d 09 |!= NIL )|.....{..|
|00001e30| 09 09 09 09 44 69 73 70 | 6f 73 50 74 72 20 28 69 |....Disp|osPtr (i|
|00001e40| 6d 61 67 65 5f 73 70 61 | 63 65 29 3b 0d 09 09 09 |mage_spa|ce);....|
|00001e50| 09 7d 0d 09 09 09 09 44 | 5f 65 72 72 6f 72 5f 61 |.}.....D|_error_a|
|00001e60| 6c 65 72 74 28 20 28 6c | 6f 6e 67 29 20 65 72 72 |lert( (l|ong) err|
|00001e70| 20 29 3b 0d 09 09 09 09 | 2a 72 65 73 75 6c 74 5f | );.....|*result_|
|00001e80| 62 6d 61 70 20 3d 20 4e | 49 4c 3b 0d 09 09 09 09 |bmap = N|IL;.....|
|00001e90| 72 65 74 75 72 6e 3b 0d | 09 09 09 7d 0d 09 09 09 |return;.|...}....|
|00001ea0| 65 6c 73 65 0d 09 09 09 | 7b 0d 09 09 09 09 28 2a |else....|{.....(*|
|00001eb0| 2a 28 6f 66 66 5f 70 6f | 72 74 2d 3e 70 6f 72 74 |*(off_po|rt->port|
|00001ec0| 50 69 78 4d 61 70 29 29 | 2e 72 6f 77 42 79 74 65 |PixMap))|.rowByte|
|00001ed0| 73 20 3d 20 6f 66 66 72 | 6f 77 62 79 74 65 73 20 |s = offr|owbytes |
|00001ee0| 2b 20 30 78 38 30 30 30 | 3b 0d 09 09 09 09 28 2a |+ 0x8000|;.....(*|
|00001ef0| 2a 28 6f 66 66 5f 70 6f | 72 74 2d 3e 70 6f 72 74 |*(off_po|rt->port|
|00001f00| 50 69 78 4d 61 70 29 29 | 2e 62 61 73 65 41 64 64 |PixMap))|.baseAdd|
|00001f10| 72 20 3d 20 69 6d 61 67 | 65 5f 73 70 61 63 65 3b |r = imag|e_space;|
|00001f20| 0d 09 09 09 09 28 2a 2a | 28 6f 66 66 5f 70 6f 72 |.....(**|(off_por|
|00001f30| 74 2d 3e 70 6f 72 74 50 | 69 78 4d 61 70 29 29 2e |t->portP|ixMap)).|
|00001f40| 62 6f 75 6e 64 73 20 3d | 20 2a 72 65 73 75 6c 74 |bounds =| *result|
|00001f50| 5f 72 65 63 74 3b 20 0d | 09 09 09 09 6f 75 72 43 |_rect; .|....ourC|
|00001f60| 4d 48 61 6e 64 6c 65 20 | 3d 20 28 2a 2a 28 2a 2a |MHandle |= (**(**|
|00001f70| 74 68 65 6d 61 78 64 65 | 76 69 63 65 29 2e 67 64 |themaxde|vice).gd|
|00001f80| 50 4d 61 70 29 2e 70 6d | 54 61 62 6c 65 3b 0d 09 |PMap).pm|Table;..|
|00001f90| 09 09 09 65 72 72 20 3d | 20 48 61 6e 64 54 6f 48 |...err =| HandToH|
|00001fa0| 61 6e 64 28 20 26 20 6f | 75 72 43 4d 48 61 6e 64 |and( & o|urCMHand|
|00001fb0| 6c 65 20 29 3b 0d 0d 09 | 09 09 09 69 66 20 28 20 |le );...|...if ( |
|00001fc0| 65 72 72 20 21 3d 20 6e | 6f 45 72 72 20 29 0d 09 |err != n|oErr )..|
|00001fd0| 09 09 09 7b 0d 09 09 09 | 09 09 53 65 74 47 44 65 |...{....|..SetGDe|
|00001fe0| 76 69 63 65 28 6f 6c 64 | 64 65 76 69 63 65 29 3b |vice(old|device);|
|00001ff0| 0d 09 09 09 09 09 53 65 | 74 50 6f 72 74 28 73 61 |......Se|tPort(sa|
|00002000| 76 65 70 6f 72 74 29 3b | 0d 09 09 09 09 09 69 66 |veport);|......if|
|00002010| 20 28 20 6f 66 66 5f 70 | 6f 72 74 20 21 3d 20 4e | ( off_p|ort != N|
|00002020| 49 4c 20 29 0d 09 09 09 | 09 09 7b 0d 09 09 09 09 |IL )....|..{.....|
|00002030| 09 09 44 69 73 70 6f 73 | 50 74 72 20 28 6f 66 66 |..Dispos|Ptr (off|
|00002040| 5f 70 6f 72 74 29 3b 0d | 09 09 09 09 09 7d 0d 09 |_port);.|.....}..|
|00002050| 09 09 09 09 69 66 20 28 | 20 69 6d 61 67 65 5f 73 |....if (| image_s|
|00002060| 70 61 63 65 20 21 3d 20 | 4e 49 4c 20 29 0d 09 09 |pace != |NIL )...|
|00002070| 09 09 09 7b 0d 09 09 09 | 09 09 09 44 69 73 70 6f |...{....|...Dispo|
|00002080| 73 50 74 72 20 28 69 6d | 61 67 65 5f 73 70 61 63 |sPtr (im|age_spac|
|00002090| 65 29 3b 0d 09 09 09 09 | 09 7d 0d 09 09 09 09 09 |e);.....|.}......|
|000020a0| 44 5f 65 72 72 6f 72 5f | 61 6c 65 72 74 28 20 28 |D_error_|alert( (|
|000020b0| 6c 6f 6e 67 29 20 65 72 | 72 20 29 3b 0d 09 09 09 |long) er|r );....|
|000020c0| 09 09 2a 72 65 73 75 6c | 74 5f 62 6d 61 70 20 3d |..*resul|t_bmap =|
|000020d0| 20 4e 49 4c 3b 09 09 09 | 0d 09 09 09 09 09 72 65 | NIL;...|......re|
|000020e0| 74 75 72 6e 3b 0d 09 09 | 09 09 7d 0d 09 09 09 09 |turn;...|..}.....|
|000020f0| 65 6c 73 65 0d 09 09 09 | 09 7b 0d 09 09 09 09 09 |else....|.{......|
|00002100| 66 6f 72 20 28 20 69 20 | 3d 20 30 3b 20 69 20 3c |for ( i |= 0; i <|
|00002110| 3d 20 28 2a 2a 6f 75 72 | 43 4d 48 61 6e 64 6c 65 |= (**our|CMHandle|
|00002120| 29 2e 63 74 53 69 7a 65 | 3b 20 2b 2b 69 20 29 0d |).ctSize|; ++i ).|
|00002130| 09 09 09 09 09 7b 0d 09 | 09 09 09 09 09 28 2a 2a |.....{..|.....(**|
|00002140| 6f 75 72 43 4d 48 61 6e | 64 6c 65 29 2e 63 74 54 |ourCMHan|dle).ctT|
|00002150| 61 62 6c 65 5b 69 5d 2e | 76 61 6c 75 65 20 3d 20 |able[i].|value = |
|00002160| 69 3b 0d 09 09 09 09 09 | 7d 0d 09 09 09 09 09 28 |i;......|}......(|
|00002170| 2a 2a 6f 75 72 43 4d 48 | 61 6e 64 6c 65 29 2e 63 |**ourCMH|andle).c|
|00002180| 74 46 6c 61 67 73 20 26 | 3d 20 30 78 37 66 66 66 |tFlags &|= 0x7fff|
|00002190| 3b 0d 09 09 09 09 09 28 | 2a 2a 6f 75 72 43 4d 48 |;......(|**ourCMH|
|000021a0| 61 6e 64 6c 65 29 2e 63 | 74 53 65 65 64 20 3d 20 |andle).c|tSeed = |
|000021b0| 47 65 74 43 54 53 65 65 | 64 28 29 3b 0d 09 09 09 |GetCTSee|d();....|
|000021c0| 09 09 2f 2a 20 74 68 65 | 20 61 62 6f 76 65 20 63 |../* the| above c|
|000021d0| 6f 64 65 20 69 73 20 6e | 65 65 64 65 64 20 66 6f |ode is n|eeded fo|
|000021e0| 72 20 63 6f 6e 76 65 72 | 74 69 6e 67 20 67 64 65 |r conver|ting gde|
|000021f0| 76 69 63 65 20 63 6c 75 | 74 73 20 74 6f 20 70 69 |vice clu|ts to pi|
|00002200| 78 6d 61 70 20 63 6c 75 | 74 73 20 2a 2f 0d 09 09 |xmap clu|ts */...|
|00002210| 09 09 09 28 2a 2a 28 2a | 6f 66 66 5f 70 6f 72 74 |...(**(*|off_port|
|00002220| 29 2e 70 6f 72 74 50 69 | 78 4d 61 70 29 2e 70 6d |).portPi|xMap).pm|
|00002230| 54 61 62 6c 65 20 3d 20 | 6f 75 72 43 4d 48 61 6e |Table = |ourCMHan|
|00002240| 64 6c 65 3b 0d 0d 09 09 | 09 09 09 53 65 74 50 6f |dle;....|...SetPo|
|00002250| 72 74 28 28 47 72 61 66 | 50 74 72 29 20 6f 66 66 |rt((Graf|Ptr) off|
|00002260| 5f 70 6f 72 74 29 3b 0d | 0d 09 09 09 09 09 52 65 |_port);.|......Re|
|00002270| 63 74 52 67 6e 28 6f 66 | 66 5f 70 6f 72 74 2d 3e |ctRgn(of|f_port->|
|00002280| 76 69 73 52 67 6e 2c 20 | 72 65 73 75 6c 74 5f 72 |visRgn, |result_r|
|00002290| 65 63 74 29 3b 0d 09 09 | 09 09 09 43 6c 69 70 52 |ect);...|...ClipR|
|000022a0| 65 63 74 28 20 72 65 73 | 75 6c 74 5f 72 65 63 74 |ect( res|ult_rect|
|000022b0| 20 29 3b 0d 0d 09 09 09 | 09 09 2f 2a 20 63 6f 70 | );.....|../* cop|
|000022c0| 79 20 6f 76 65 72 20 74 | 68 65 20 62 69 74 6d 61 |y over t|he bitma|
|000022d0| 70 73 20 2a 2f 0d 09 09 | 09 09 09 45 72 61 73 65 |ps */...|...Erase|
|000022e0| 52 65 63 74 28 20 72 65 | 73 75 6c 74 5f 72 65 63 |Rect( re|sult_rec|
|000022f0| 74 29 3b 0d 0d 09 09 09 | 09 09 48 4c 6f 63 6b 28 |t);.....|..HLock(|
|00002300| 28 48 61 6e 64 6c 65 29 | 20 28 6f 66 66 5f 70 6f |(Handle)| (off_po|
|00002310| 72 74 2d 3e 70 6f 72 74 | 50 69 78 4d 61 70 29 29 |rt->port|PixMap))|
|00002320| 3b 0d 0d 09 09 09 09 09 | 48 4c 6f 63 6b 28 28 48 |;.......|HLock((H|
|00002330| 61 6e 64 6c 65 29 20 28 | 70 72 6f 74 6f 6e 5f 62 |andle) (|proton_b|
|00002340| 6d 61 70 2d 3e 70 6f 72 | 74 50 69 78 4d 61 70 29 |map->por|tPixMap)|
|00002350| 29 3b 0d 09 09 09 09 09 | 43 6f 70 79 42 69 74 73 |);......|CopyBits|
|00002360| 28 20 28 42 69 74 4d 61 | 70 20 2a 29 20 2a 28 70 |( (BitMa|p *) *(p|
|00002370| 72 6f 74 6f 6e 5f 62 6d | 61 70 2d 3e 70 6f 72 74 |roton_bm|ap->port|
|00002380| 50 69 78 4d 61 70 29 2c | 20 0d 09 09 09 09 09 09 |PixMap),| .......|
|00002390| 09 20 20 28 42 69 74 4d | 61 70 20 2a 29 20 2a 28 |.  (BitM|ap *) *(|
|000023a0| 6f 66 66 5f 70 6f 72 74 | 2d 3e 70 6f 72 74 50 69 |off_port|->portPi|
|000023b0| 78 4d 61 70 29 2c 20 0d | 09 09 09 09 09 09 09 70 |xMap), .|.......p|
|000023c0| 72 6f 74 6f 6e 5f 72 65 | 63 74 2c 20 26 70 72 5f |roton_re|ct, &pr_|
|000023d0| 6f 66 66 2c 20 28 73 68 | 6f 72 74 29 20 73 72 63 |off, (sh|ort) src|
|000023e0| 43 6f 70 79 2c 20 0d 09 | 09 09 09 09 09 09 28 52 |Copy, ..|......(R|
|000023f0| 67 6e 48 61 6e 64 6c 65 | 29 20 4e 49 4c 29 3b 0d |gnHandle|) NIL);.|
|00002400| 09 09 09 09 09 48 55 6e | 6c 6f 63 6b 28 28 48 61 |.....HUn|lock((Ha|
|00002410| 6e 64 6c 65 29 20 28 70 | 72 6f 74 6f 6e 5f 62 6d |ndle) (p|roton_bm|
|00002420| 61 70 2d 3e 70 6f 72 74 | 50 69 78 4d 61 70 29 29 |ap->port|PixMap))|
|00002430| 3b 0d 0d 09 09 09 09 09 | 48 4c 6f 63 6b 28 28 48 |;.......|HLock((H|
|00002440| 61 6e 64 6c 65 29 20 28 | 66 6c 6f 75 72 69 6e 65 |andle) (|flourine|
|00002450| 5f 62 6d 61 70 2d 3e 70 | 6f 72 74 50 69 78 4d 61 |_bmap->p|ortPixMa|
|00002460| 70 29 29 3b 0d 09 09 09 | 09 09 43 6f 70 79 42 69 |p));....|..CopyBi|
|00002470| 74 73 28 20 28 42 69 74 | 4d 61 70 20 2a 29 20 2a |ts( (Bit|Map *) *|
|00002480| 28 66 6c 6f 75 72 69 6e | 65 5f 62 6d 61 70 2d 3e |(flourin|e_bmap->|
|00002490| 70 6f 72 74 50 69 78 4d | 61 70 29 2c 20 0d 09 09 |portPixM|ap), ...|
|000024a0| 09 09 09 09 09 20 20 28 | 42 69 74 4d 61 70 20 2a |.....  (|BitMap *|
|000024b0| 29 20 2a 28 6f 66 66 5f | 70 6f 72 74 2d 3e 70 6f |) *(off_|port->po|
|000024c0| 72 74 50 69 78 4d 61 70 | 29 2c 20 0d 09 09 09 09 |rtPixMap|), .....|
|000024d0| 09 09 09 66 6c 6f 75 72 | 69 6e 65 5f 72 65 63 74 |...flour|ine_rect|
|000024e0| 2c 20 26 66 6c 5f 6f 66 | 66 2c 20 28 73 68 6f 72 |, &fl_of|f, (shor|
|000024f0| 74 29 20 61 64 64 5f 6d | 6f 64 65 2c 20 0d 09 09 |t) add_m|ode, ...|
|00002500| 09 09 09 09 09 28 52 67 | 6e 48 61 6e 64 6c 65 29 |.....(Rg|nHandle)|
|00002510| 20 4e 49 4c 29 3b 0d 09 | 09 09 09 09 48 55 6e 6c | NIL);..|....HUnl|
|00002520| 6f 63 6b 28 28 48 61 6e | 64 6c 65 29 20 28 66 6c |ock((Han|dle) (fl|
|00002530| 6f 75 72 69 6e 65 5f 62 | 6d 61 70 2d 3e 70 6f 72 |ourine_b|map->por|
|00002540| 74 50 69 78 4d 61 70 29 | 29 3b 0d 0d 09 09 09 09 |tPixMap)|);......|
|00002550| 09 48 55 6e 6c 6f 63 6b | 28 28 48 61 6e 64 6c 65 |.HUnlock|((Handle|
|00002560| 29 20 28 6f 66 66 5f 70 | 6f 72 74 2d 3e 70 6f 72 |) (off_p|ort->por|
|00002570| 74 50 69 78 4d 61 70 29 | 29 3b 0d 0d 09 09 09 09 |tPixMap)|);......|
|00002580| 09 53 65 74 47 44 65 76 | 69 63 65 28 6f 6c 64 64 |.SetGDev|ice(oldd|
|00002590| 65 76 69 63 65 29 3b 0d | 0d 09 09 09 09 09 53 65 |evice);.|......Se|
|000025a0| 74 50 6f 72 74 28 73 61 | 76 65 70 6f 72 74 29 3b |tPort(sa|veport);|
|000025b0| 0d 09 09 09 09 09 2a 72 | 65 73 75 6c 74 5f 62 6d |......*r|esult_bm|
|000025c0| 61 70 20 3d 20 6f 66 66 | 5f 70 6f 72 74 3b 0d 09 |ap = off|_port;..|
|000025d0| 09 09 09 09 72 65 74 75 | 72 6e 3b 0d 09 09 09 09 |....retu|rn;.....|
|000025e0| 7d 0d 09 09 09 7d 0d 09 | 09 7d 0d 09 7d 2f 2a 20 |}....}..|.}..}/* |
|000025f0| 65 6e 64 20 69 66 20 61 | 72 67 73 20 72 65 61 73 |end if a|rgs reas|
|00002600| 6f 6e 61 62 6c 65 20 2a | 2f 0d 7d 0d 00 00 00 00 |onable *|/.}.....|
|00002610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002680| 00 00 01 00 00 00 01 1a | 00 00 00 1a 00 00 00 46 |........|.......F|
|00002690| 0d 20 2a 0d 20 2a 20 20 | 43 6f 70 79 72 69 67 68 |. *. *  |Copyrigh|
|000026a0| 74 20 28 63 29 20 31 39 | 38 38 20 53 79 6d 61 6e |t (c) 19|88 Syman|
|000026b0| 08 70 69 78 5f 69 6f 2e | 63 00 02 00 00 00 50 61 |.pix_io.|c.....Pa|
|000026c0| 72 74 53 49 54 78 00 00 | 00 00 00 00 00 00 00 01 |rtSITx..|........|
|000026d0| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|000026e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000026f0| 00 00 a9 80 15 cb 00 00 | 00 00 00 00 01 60 20 41 |........|.....` A|
|00002700| 70 70 6c 65 20 43 6f 6d | 70 75 74 65 72 2c 20 49 |pple Com|puter, I|
|00002710| 6e 63 2e 2c 20 31 39 38 | 35 2c 20 31 39 38 36 2c |nc., 198|5, 1986,|
|00002720| 20 31 39 38 37 2c 20 31 | 39 38 38 2e 0d 20 2a 0d | 1987, 1|988.. *.|
|00002730| 20 2a 2f 0d 0d 23 69 66 | 6e 64 65 66 09 5f 4f 53 | */..#if|ndef._OS|
|00002740| 55 74 69 6c 5f 0d 23 64 | 65 66 69 6e 65 20 5f 4f |Util_.#d|efine _O|
|00002750| 53 55 74 69 6c 5f 0d 0d | 23 69 66 6e 64 65 66 09 |SUtil_..|#ifndef.|
|00002760| 5f 4d 61 63 54 79 70 65 | 73 5f 0d 23 69 6e 63 6c |_MacType|s_.#incl|
|00002770| 75 64 65 20 22 4d 61 63 | 54 79 70 65 73 2e 68 22 |ude "Mac|Types.h"|
|00002780| 00 00 00 04 00 07 00 04 | 00 00 00 0e 00 0c 0b 50 |........|.......P|
|00002790| 72 6f 67 72 61 6d 46 6f | 6e 74 00 00 01 00 00 00 |rogramFo|nt......|
|000027a0| 01 1a 00 00 00 1a 00 00 | 00 46 00 36 64 ec 07 5a |........|.F.6d..Z|
|000027b0| 00 00 00 1c 00 46 00 01 | 45 54 41 42 00 00 00 12 |.....F..|ETAB....|
|000027c0| 45 46 4e 54 00 00 00 1e | 03 ec ff ff 00 00 00 00 |EFNT....|........|
|000027d0| 00 36 64 0c 03 eb ff ff | 00 00 00 08 00 36 63 dc |.6d.....|.....6c.|
|000027e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000027f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+